home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Turnbull China Bikeride
/
Turnbull China Bikeride - Disc 2.iso
/
STUTTGART
/
FROMUTS
/
RISCBBS
/
!RiscBBS
/
BBS
/
ANSI
/
Breakout
< prev
next >
Wrap
Text File
|
1991-12-29
|
868b
|
25 lines
{report `Breakout game`}
{attr 4 3} -- Online ANSI Break-Out -- {attr 0 2} {_time} / {_online} {bg 4 cll attr 0 2}
{if ANSI=0 goto +noansi}{if BAUD<2400 goto +badbaud}{if LINES<24 goto +toosmall}
Bat controls : {attr 4 6} Z {attr 0 2} moves left, {attr 4 6} X {attr 0 2} moves right.
Ball speed : {attr 4 6} + {attr 0 2} increases, {attr 4 6} - {attr 0 2} decreases.
{fg 3}Use CTRL-X at any time to abort the game!
{fg 1}Press <ENTER> to start game... {label getenter getkey V1 if V1<>13 goto getenter}
{runtask `<RiscBBS$Dir>.SubTasks.!Breakout HANDLE`}
{wait getkey V0 attr 0 7 cls eof}
{label noansi}
I'm sorry, but to play Break-Out you really need ANSI graphics...
{enter}
{eof label badbaud}
I'm sorry, but below 2400 baud Break-Out isn't playable...
{enter}
{eof label toosmall}
I'm sorry, but you need at least 24 lines on your display...
{enter}